program p
  ! DIMENSION is a keyword
  DOUBLE PRECISION , DIMENSION ( 100 ) :: A , B 
end program p
